5 Q$=CHR$(34)
10 REM   RAM DISK STARTER
20 REM
30 REM     RAM DISK IS WRITTEN BY
40 REM       JEFF JOHNSON
50 REM
60 REM     THE WEDGE WHICH ALLOWS
70 REM       THE USAGE OF THE '&'
80 REM       SIGN INSTEAD OF SYS51200
90 REM       WAS PROGRAMMED BY
100 REM      ALAN GARDNER
110 REM
120 REM
130 IFX=0THENX=1:LOAD"RAM WEDGE.O",8,1
140 IFX=1THENX=2:LOAD"RAM DISK",8,1
150 SYS828
160 POKE53281,0:PRINT"[147]RAM DISK IS NOW ACTIVE."
165 PRINT"     [210][193][205][160][196][201][211][203] USES THESE COMMANDS:"
170 PRINT"&"Q$"S:FILENAME"Q$" - SAVE A FILE TO RAM."
172 PRINT"&"Q$"L:FILENAME"Q$" - LOAD A FILE FROM RAM."
174 PRINT"&"Q$"K:FILENAME"Q$" - KILL A FILE IN RAM."
175 PRINT"&"Q$"A:FILENAME"Q$" - SAVE A FILE TO DISK."
176 PRINT"&"Q$"A"Q$"          - SAVE ALL FILES."
177 PRINT"&"Q$"K"Q$"          - KILL ALL FILES."
178 PRINT"&"Q$"$"Q$"          - VIEW DIRECTORY."
180 PRINT:PRINT"[215]OULD YOU LIKE A PRINTED LIST OF THE"
182 PRINT"COMMANDS?":POKE198,0:WAIT198,1:GETA$
184 IFA$<>"Y"THEN200
185 PRINT"[207][203]..[208]UT YOUR PRINTER ON-LINE AND PRESS"
186 PRINT"A KEY.":POKE198,0:WAIT198,1:OPEN4,4,7:CMD4
187 PRINT"     [210][193][205][160][196][201][211][203] USES THESE COMMANDS:":PRINT:PRINT
188 PRINT"&"Q$"S:FILENAME"Q$" - SAVE A FILE TO RAM."
189 PRINT"&"Q$"L:FILENAME"Q$" - LOAD A FILE FROM RAM."
190 PRINT"&"Q$"K:FILENAME"Q$" - KILL A FILE IN RAM."
192 PRINT"&"Q$"A:FILENAME"Q$" - SAVE A FILE TO DISK."
194 PRINT"&"Q$"A"Q$"          - SAVE ALL FILES TO DISK."
196 PRINT"&"Q$"K"Q$"          - KILL ALL FILES IN RAM."
198 PRINT"&"Q$"$"Q$"          - VIEW DIRECTORY."
199 PRINT#4:CLOSE4
200 END